Call data
library(ggplot2)
library(plotly)
##
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
##
## last_plot
## The following object is masked from 'package:stats':
##
## filter
## The following object is masked from 'package:graphics':
##
## layout
#data from https://www.kaggle.com/lava18/google-play-store-apps
mydata = read.csv("googleplaystore.csv")
Analyze
#評分分布
my.plot3 <- ggplot(mydata, aes(x = Rating))
my.plot3 <- my.plot3 +
geom_histogram(binwidth = 0.2, fill = "steelblue")
my.plot3

#各類型APP評分分布
plot_ly(mydata, x = ~Rating, color = ~Category, type = "box")
## Warning in RColorBrewer::brewer.pal(N, "Set2"): n too large, allowed maximum for palette Set2 is 8
## Returning the palette you asked for with that many colors
## Warning in RColorBrewer::brewer.pal(N, "Set2"): n too large, allowed maximum for palette Set2 is 8
## Returning the palette you asked for with that many colors